function [ Mzz ] = RegulMomZZ( donnees )

maillage = donnees.maillage ;
Uh = donnees.res.Uh ;

nNoeuds = size(maillage,1) ;

Mzz = zeros(nNoeuds,1) ;

element = maillage (1:2) ;
UhElem = Uh(1:4) ;

Mzz(1) = Moment_element(donnees,0,element,UhElem) ;


for i=2:nNoeuds-1
    element = maillage (i:i+1) ;
    UhElem = Uh(2*i-1:2*i+2) ;
    
    elementPrec = maillage (i-1:i) ;
    LPrec = elementPrec(2) - elementPrec(1) ;
    UhElemPrec = Uh(2*(i-1)-1:2*(i-1)+2) ;
    
    Mzz(i) = 0.5*(Moment_element(donnees,0,element,UhElem) + Moment_element(donnees,LPrec,elementPrec,UhElemPrec));
    
end

element = maillage (end-1:end) ;
L = element(2) - element(1) ;
UhElem = Uh(end-3:end) ;

Mzz(end) = Moment_element(donnees,L,element,UhElem) ;

end

